1 IFA=1THEN710
2 POKE53280,.:POKE53281,.
10 PRINT"[147]"
20 PRINT"10 [152]rem'       [158]loadstar [156]pRESENTS"
30 PRINT"15 [152]rem'"
40 PRINT"20 [152][210][197][205]'      [149][212] [207][160][212] [193] [204]   [204] [201] [211] [212]"
50 PRINT"25 [152][210][197][205]'      [155][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
60 PRINT"30 [152]rem'"
70 PRINT"35 [152][210][197][205]'      [159][194]Y [194]RET [205]. [212]IMMINS"
80 PRINT"40 [152]rem'"
90 PRINT"45 [152]rem'       [150](c)OPYRIGHT 1988"
100 PRINT"50 [152]rem'"
110 PRINT"55 [152]rem'"
120 PRINT"60 [152][210][197][205]' [160] [208]RESS ANY KEY TO CONTINUE"
130 PRINT"65 [152]rem'"
140 PRINT"70 [152]geta$:ifa$=''then70"
150 PRINT"75 [152]print'sHNE[146]'"
160 PRINT"80 [152]print'QQQQQQQQQQQQQQQ]]]]]]]]]]]][146]';"
170 PRINT"85 [152]print' pLEASE WAIT WHILE LOADING...'"
180 PRINT"90 [152]rem"
190 PRINT"95 [152]load'TOTAL LIST.ML',8,1"
200 PRINT
210 PRINT
220 PRINT"READY."
230 PRINT"RUN"
240 PRINT
250 PRINT" [208]RESS ANY KEY WHEN READY TO CONTINUE"
260 GETA$:IFA$=""THEN260
270 PRINT"[147]"
280 PRINT"          [149][212] [207] [212] [193] [204]   [204] [201] [211] [212]"
290 PRINT"          [152][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
300 PRINT
310 PRINT"  [154]tO USE TOTAL LIST YOU MUST BE IN"
320 PRINT"DIRECT MODE OF [194][193][211][201][195].  [201]F YOU CHOOSE"
330 PRINT"TO ACTIVATE total list [154]YOU WILL HAVE"
340 PRINT"TO REBOOT [158]loadstar [154]TO GET BACK TO MAIN"
350 PRINT"MENU."
360 PRINT
370 PRINT" [159]dO YOU WISH TO ACTIVATE total list?"
380 PRINT
390 PRINT"            [153]y)ES or n)O"
400 PRINT
410 GETA$:IFA$=""THEN410
420 IFA$="Y"ORA$="[217]"THEN460
430 IFA$="N"ORA$="[206]"THEN440
431 GOTO 410
440 OPEN15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":INPUT#15,ER,ER$:CLOSE15
441 IFER<>63THENPRINT"[147]":END
445 LOAD"HELLO CONNECT",8,1
450 REM
460 PRINT"[147]"
470 PRINT"          [149][212] [207] [212] [193] [204]   [204] [201] [211] [212]"
480 PRINT"          [152][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
490 PRINT
500 PRINT"   [155]cOMMANDS:"
510 PRINT
520 PRINT"    [159]ctrl[151]/[159]f7  [155]--  sCROLL fORWARD"
530 PRINT"    [159]ctrl[151]/[159]f5  [155]--  sCROLL bACKWARD"
540 PRINT"    [159]joystick [155]--  sCROLL uP OR dOWN"
550 PRINT
560 PRINT"[153][160]   [159]ctrl[151]/[159]+   [155]--  fORWARD 1 pAGE"
570 PRINT"    [159]ctrl[151]/[159]-   [155]--  bACKWARD 1 pAGE"
580 PRINT
590 PRINT"    [159]ctrl[151]/[159]i   [155]--  iNSERT bLANK lINE"
600 PRINT
610 PRINT"    [159]ctrl[151]/[159]x   [155]--  dISABLE total list"
620 PRINT" [159]sys 50200   [155]--  rEACTIVATE total list"
630 PRINT
640 PRINT"[129][206][207][212][197] [150]: [212][207][212][193][204] [204][201][211][212] [154]SHOULD BE DISABLED"
650 PRINT"[152][163][163][163][163]   [154]BEFORE [207][208][197][206][154]ING A CHANNEL"
660 PRINT"       TO A PRINTER OR DISK DRIVE."
670 PRINT
680 PRINT"[208]RESS ANY KEY WHEN READY TO CONTINUE"
690 GETA$:IFA$=""THEN690
700 PRINT"[147][208]LEASE WAIT WHILE LOADING..."
705 A=1:LOAD"TOTAL LIST.O",8,1
710 PRINT"[147][212][207][212][193][204] [204][201][211][212] [193]CTIVATED"
719 PRINT"[196][207][206]'[212] [198][207][210][199][197][212]...[154][217]OU MUST DEACTIVATE
720 [153]"(null)(null)(null)ATN(null) (null)RIGHT$(null)(null) BEFORE REBOOTING SYS(null)(null)ATNSTR$(null)(null)ATN(null)
721 PRINT"[154]BY RESETTING YOUR COMPUTER OR BY
722 [153]"PRESSING 'LEN(null)(null)(null)-(null)'.
740 SYS50200